Top 10k strings from Ace Low (1983)(CCS).tap
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
60 ,Y;" "; 9 ;" ": 4 x,y;"Q "; 4 x,y;"K "; 4 x,y;"J "; 4 x,y;"A "; 4 x,y;"9 "; 4 x,y;"8 "; 4 x,y;"7 "; 4 x,y;"6 "; 4 x,y;"5 "; 4 x,y;"4 "; 4 x,y;"3 "; 4 x,y;"2 "; 4 ,Y;" Q" 4 ,Y;" K" 4 ,Y;" J" 4 ,Y;" A" 4 ,Y;" 9" 4 ,Y;" 8" 4 ,Y;" 7" 4 ,Y;" 6" 4 ,Y;" 5" 4 ,Y;" 4" 4 ,Y;" 3" 4 ,Y;" 2" 2 ;" YOU HAVE LOST ALL YOUR MONEY!!" 2 ;" ": 2 83 RICHARD COBDEN. ACE LOW 2 2 2 2 1 sc5=MONEY: 1 sc4=MONEY: 1 sc3=MONEY: 1 sc2=MONEY: 1 sc1=MONEY: 1 f,n;" " 1 T$=T$+T$+T$ 1 T$="DO YOU WANT INSTRUCTIONS (Y/N). " 1 S$=S$+S$+S$ 1 S$="ACE LOW 1 MONEY=MONEY-1 1 MONEY=MONEY+JACK: 1 MONEY=MONEY+5 1 JACK=JACK+J(n) 1 DO YOU WANT INSTRUCTIONS (Y/N). DO YOU WANT INSTRUCTIONS (Y/N). DO YOU WANT INSTRUCTIONS (Y/N). S` 1 AceLow 5` 1 ;"____________" 1 ;"YOU LOOSE" 1 ;"YOU HAVE `";MONEY;" " 1 ;"The game will end when you have lost all your money or if you quit." 1 ;"TOTAL = ` ";JACK 1 ;"SURPRISE JACKPOT !": 1 ;"Published by C.C.S." 1 ;"PLEASE WAIT" 1 ;"Money NOT sufficient to be recorded": 1 ;"JACKPOT = ` ";J(8 1 ;"JACKPOT = ` ";J(7 1 ;"JACKPOT = ` ";J(6 1 ;"JACKPOT = ` ";J(5 1 ;"JACKPOT = ` ";J(4 1 ;"JACKPOT = ` ";J(3 1 ;"JACKPOT = ` ";J(2 1 ;"JACKPOT = ` ";J(1 1 ;"If you win twice in succession you will win a JACKPOT." 1 ;"INSTRUCTIONS" 1 ;"HIGHEST SCORES"; 1 ;"HIGHER": 1 ;"HIGHER OR LOWER" 1 ;"Enter your name(10 letters)": 1 ;"Do you want to quit and record your score 1 ;"DO YOU WANT TO PLAY AGAIN 1 ;"CASH BONANZA OF `";MONEY;" ";o$: 1 ;"ACE LOW": 1 ;"********************************* 1 ;" The program involves guessing if the card proceding the one displayed on the rack will be higher or lower in value. You can win either way you bet if the proceding card is the same value. A King is the highest and an ace is the lowest in value. You start off with `10 and do not win unless you reach the top right hand card where upon you win `5." 1 ;" PRESS ANY KEY TO CONTINUE " 1 ;" PRESS ANY KEY TO PLAY AGAIN " 1 ;" Press any key to continue " 1 ;" 'H'=HIGHER 'L'=LOWER " 1 ;" " 1 ;" ": 1 ;" ": 1 ;" 1 "STOP THE TAPE" 1 "SPARE MEMORY=";Z ;" BYTES ": 1 " 1 83 RICHARD COBDEN. s 1 83 RICHARD COBDEN. " 1 ** 1 ** 1 *********************************" 1 ** 1 T` 1 1 1 1